10 REM  SCREEN BORDER SET UP FOR BOUNCING BALLS
20 REM
30 IFA=0THEN PRINT"[147]LOADING BBALLS.IRQ":A=1:LOAD"BBALLS.IRQ",8,1
40 PRINT"[147][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]";
50 FORX=1TO23:PRINT"[221]                                      [221]";:NEXT
60 PRINT"[173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192]";:POKE2023,125
70 SYS49152
80 GOTO80